﻿Imports System.Data
Imports System.Data.Odbc
Imports WSEntidades
Imports Utilerias
Imports MySql.Data.MySqlClient
Public Class ProcesosFact
    Public Shared Function Build(ByVal dr As MySqlDataReader) As ProcesosBE
        Dim tmpProceso As ProcesosBE = New ProcesosBE()
        Try
            With tmpProceso
                .idProceso = convertDTFromDb.ConvertString(dr.Item("idProceso"))
                .proceso = convertDTFromDb.ConvertString(dr.Item("proceso"))
            End With
            Return tmpProceso
        Catch ex As Exception
            Throw
        Finally
            tmpProceso = Nothing
        End Try
    End Function
End Class
